YES 0.654
↳ HASKELL
↳ LR
((elemIndex :: () -> [()] -> Maybe Int) :: () -> [()] -> Maybe Int) |
import qualified Maybe import qualified Prelude |
|||||||||||||||||
elemIndex :: Eq a => a -> [a] -> Maybe Int
|
|||||||||||||||||
findIndex :: (a -> Bool) -> [a] -> Maybe Int
|
|||||||||||||||||
findIndices :: (a -> Bool) -> [a] -> [Int]
|
import qualified List import qualified Prelude |
|||||||||
listToMaybe :: [a] -> Maybe a
|
\vv1→
case vv1 of (x,i) → if p x then i : [] else [] _ → []
findIndices0 p vv1 =
case vv1 of (x,i) → if p x then i : [] else [] _ → []
\ab→(a,b)
zip0 a b = (a,b)
↳ HASKELL
↳ LR
↳ HASKELL
↳ CR
((elemIndex :: () -> [()] -> Maybe Int) :: () -> [()] -> Maybe Int) |
import qualified Maybe import qualified Prelude |
|||||||||||||||||
elemIndex :: Eq a => a -> [a] -> Maybe Int
|
|||||||||||||||||
findIndex :: (a -> Bool) -> [a] -> Maybe Int
|
|||||||||||||||||
findIndices :: (a -> Bool) -> [a] -> [Int]
|
|||||||||||||||||
|
import qualified List import qualified Prelude |
|||||||||
listToMaybe :: [a] -> Maybe a
|
case vv1 of (x,i) → if p x then i : [] else [] _ → []
findIndices00 p (x,i) = if p x then i : [] else [] findIndices00 p _ = []
↳ HASKELL
↳ LR
↳ HASKELL
↳ CR
↳ HASKELL
↳ IFR
((elemIndex :: () -> [()] -> Maybe Int) :: () -> [()] -> Maybe Int) |
import qualified Maybe import qualified Prelude |
|||||||||
elemIndex :: Eq a => a -> [a] -> Maybe Int
|
|||||||||
findIndex :: (a -> Bool) -> [a] -> Maybe Int
|
|||||||||
findIndices :: (a -> Bool) -> [a] -> [Int]
|
|||||||||
|
|||||||||
|
import qualified List import qualified Prelude |
|||||||||
listToMaybe :: [a] -> Maybe a
|
if p x then i : [] else []
findIndices000 i True = i : [] findIndices000 i False = []
↳ HASKELL
↳ LR
↳ HASKELL
↳ CR
↳ HASKELL
↳ IFR
↳ HASKELL
↳ BR
((elemIndex :: () -> [()] -> Maybe Int) :: () -> [()] -> Maybe Int) |
import qualified Maybe import qualified Prelude |
|||||||||
elemIndex :: Eq a => a -> [a] -> Maybe Int
|
|||||||||
findIndex :: (a -> Bool) -> [a] -> Maybe Int
|
|||||||||
findIndices :: (a -> Bool) -> [a] -> [Int]
|
|||||||||
|
|||||||||
|
|||||||||
|
import qualified List import qualified Prelude |
|||||||||
listToMaybe :: [a] -> Maybe a
|
↳ HASKELL
↳ LR
↳ HASKELL
↳ CR
↳ HASKELL
↳ IFR
↳ HASKELL
↳ BR
↳ HASKELL
↳ COR
((elemIndex :: () -> [()] -> Maybe Int) :: () -> [()] -> Maybe Int) |
import qualified Maybe import qualified Prelude |
|||||||||
elemIndex :: Eq a => a -> [a] -> Maybe Int
|
|||||||||
findIndex :: (a -> Bool) -> [a] -> Maybe Int
|
|||||||||
findIndices :: (a -> Bool) -> [a] -> [Int]
|
|||||||||
|
|||||||||
|
|||||||||
|
import qualified List import qualified Prelude |
|||||||||
listToMaybe :: [a] -> Maybe a
|
undefined
| False
= undefined
undefined = undefined1
undefined0 True = undefined
undefined1 = undefined0 False
↳ HASKELL
↳ LR
↳ HASKELL
↳ CR
↳ HASKELL
↳ IFR
↳ HASKELL
↳ BR
↳ HASKELL
↳ COR
↳ HASKELL
↳ NumRed
((elemIndex :: () -> [()] -> Maybe Int) :: () -> [()] -> Maybe Int) |
import qualified Maybe import qualified Prelude |
|||||||||
elemIndex :: Eq a => a -> [a] -> Maybe Int
|
|||||||||
findIndex :: (a -> Bool) -> [a] -> Maybe Int
|
|||||||||
findIndices :: (a -> Bool) -> [a] -> [Int]
|
|||||||||
|
|||||||||
|
|||||||||
|
import qualified List import qualified Prelude |
|||||||||
listToMaybe :: [a] -> Maybe a
|
↳ HASKELL
↳ LR
↳ HASKELL
↳ CR
↳ HASKELL
↳ IFR
↳ HASKELL
↳ BR
↳ HASKELL
↳ COR
↳ HASKELL
↳ NumRed
↳ HASKELL
↳ Narrow
(elemIndex :: () -> [()] -> Maybe Int) |
import qualified Maybe import qualified Prelude |
|||||||||
elemIndex :: Eq a => a -> [a] -> Maybe Int
|
|||||||||
findIndex :: (a -> Bool) -> [a] -> Maybe Int
|
|||||||||
findIndices :: (a -> Bool) -> [a] -> [Int]
|
|||||||||
|
|||||||||
|
|||||||||
|
import qualified List import qualified Prelude |
|||||||||
listToMaybe :: [a] -> Maybe a
|